package zhoug.common.utils;

import java.text.SimpleDateFormat;
import java.util.Date;
import java.util.Hashtable;
import java.util.Locale;

/**
 * 身份证工具
 *
 * @Author HK-LJJ
 * @Date 2020/3/24
 * @Description
 */
public class IDCardUtils {
    private static final String TAG = "IDCardUtils";
    // 居民身份证号的组成元素
    private static final String[] ValCodeArr = {"1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2"};
    private static final String[] Wi = {"7", "9", "10", "5", "8", "4", "2", "1", "6", "3", "7", "9", "10", "5", "8", "4", "2"};

    // 身份证的最小出生日期,1900年1月1日
    private final static Date MINIMAL_BIRTH_DATE = new Date(-2209017600000L);
    private static final String BIRTH_DATE_FORMAT = "yyyyMMdd";
    private final static int NEW_CARD_NUMBER_LENGTH = 18;
    private final static int OLD_CARD_NUMBER_LENGTH = 15;
    private final static String LENGTH_ERROR = "身份证长度必须为15或者18位！";
    private final static String NUMBER_ERROR = "15位身份证都应该为数字，18位身份证都应该前17位应该都为数字！";
    private final static String DATE_ERROR = "身份证中出生日期不合法！";
    private final static String AREA_ERROR = "身份证地区编码错误!";
    private final static String CHECKCODE_ERROR = "身份证校验位错误！";
    private final static String BIRTHDAY_ERROR = "身份证的出生日期无效！";
    //是否需要返回自动补全成的身份证
    private static boolean isNeedReturn_AutoCard = false;

    /**
     * 地区编码
     */
    private static final Hashtable<String, String> AREACOD;

    static {
        AREACOD = new Hashtable<>();
        AREACOD.put("11", "北京");
        AREACOD.put("12", "天津");
        AREACOD.put("13", "河北");
        AREACOD.put("14", "山西");
        AREACOD.put("15", "内蒙古");
        AREACOD.put("21", "辽宁");
        AREACOD.put("22", "吉林");
        AREACOD.put("23", "黑龙江");
        AREACOD.put("31", "上海");
        AREACOD.put("32", "江苏");
        AREACOD.put("33", "浙江");
        AREACOD.put("34", "安徽");
        AREACOD.put("35", "福建");
        AREACOD.put("36", "江西");
        AREACOD.put("37", "山东");
        AREACOD.put("41", "河南");
        AREACOD.put("42", "湖北");
        AREACOD.put("43", "湖南");
        AREACOD.put("44", "广东");
        AREACOD.put("45", "广西");
        AREACOD.put("46", "海南");
        AREACOD.put("50", "重庆");
        AREACOD.put("51", "四川");
        AREACOD.put("52", "贵州");
        AREACOD.put("53", "云南");
        AREACOD.put("54", "西藏");
        AREACOD.put("61", "陕西");
        AREACOD.put("62", "甘肃");
        AREACOD.put("63", "青海");
        AREACOD.put("64", "宁夏");
        AREACOD.put("65", "新疆");
        AREACOD.put("71", "台湾");
        AREACOD.put("81", "香港");
        AREACOD.put("82", "澳门");
        AREACOD.put("91", "国外");
    }


    /**
     * 身份证校验
     *
     * @param idCardNumber 需要验证的身份证
     * @return 是否是身份证号码
     */
    public static boolean validate(String idCardNumber) throws Exception {
        String idCard = idCardNumber.trim();
        //身份证长度验证
        int length = idCard.length();
        if (length == OLD_CARD_NUMBER_LENGTH || length == NEW_CARD_NUMBER_LENGTH) {
            //如果为15位则自动补全到18位
            if (length == OLD_CARD_NUMBER_LENGTH) {
                idCard = contertToNewCardNumber(idCard);
            }
        } else {
            throw new Exception(LENGTH_ERROR);
        }
        // 身份证号的前15,17位必须是阿拉伯数字
        for (int i = 0; i < NEW_CARD_NUMBER_LENGTH - 1; i++) {
            char ch = idCard.charAt(i);
            if (ch < '0' || ch > '9') {
                throw new Exception(NUMBER_ERROR);
            }
        }
        //校验身份证日期信息是否有效 ，出生日期不能晚于当前时间，并且不能早于1900年

        Date birthDate = getBirthDate(idCard);
        //身份证日期必须在当前时间之前
        if (!birthDate.before(new Date())) {
            throw new Exception(BIRTHDAY_ERROR);
        }
        //身份证日期必须在1900之后
        if (!birthDate.after(MINIMAL_BIRTH_DATE)) {
            throw new Exception(BIRTHDAY_ERROR);
        }
        /**
         * 出生日期中的年、月、日必须正确,比如月份范围是[1,12],日期范围是[1,31]，还需要校验闰年、大月、小月的情况时，
         * 月份和日期相符合
         */
        String birthdayPart = getBirthDayPart(idCard);
        String realBirthdayPart = createBirthDateParser().format(birthDate);
        if (!birthdayPart.equals(realBirthdayPart)) {
            //DATE_ERROR
            throw new Exception(BIRTHDAY_ERROR);
        }

        //地区码是否正确
        if (AREACOD.get(idCard.substring(0, 2)) == null) {
            //AREA_ERROR
            throw new Exception(AREA_ERROR);
        }
        //校验身份证最后一位 身份证校验码
        if (!calculateVerifyCode(idCard).equalsIgnoreCase(String.valueOf(idCard.charAt(NEW_CARD_NUMBER_LENGTH - 1)))) {
            throw new Exception(CHECKCODE_ERROR);
        }
        //通过验证则返回true
        return true;
    }

    /**
     * 根据身份证获取出生日期
     *
     * @param IdCard
     * @param format yyyyMMdd
     * @return
     */
    public static String getBirthDay(String IdCard, String format) {
        try {
            if (format == null) {
                format = BIRTH_DATE_FORMAT;
            }
            String newIdCard = contertToNewCardNumber(IdCard);
            SimpleDateFormat simpleDateFormat = new SimpleDateFormat(format, Locale.getDefault());
            return simpleDateFormat.format(getBirthDate(newIdCard));
        } catch (Exception e) {
            e.printStackTrace();
        }
        return null;
    }

    /**
     * 根据合法的身份证获取性别
     *
     * @param idCard
     * @return 性别
     */
    public static String getSexByIdCard(String idCard) {
        String newIdCard = contertToNewCardNumber(idCard);
        int gd = Integer.parseInt(newIdCard.charAt(16) + "");
        if (gd % 2 == 0) {//偶数
            return "女";
        } else {
            return "男";
        }

    }


    /**
     * 把15位身份证号码转换到18位身份证号码<br>
     * 15位身份证号码与18位身份证号码的区别为：<br>
     * 1、15位身份证号码中，"出生年份"字段是2位，转换时需要补入"19"，表示20世纪<br>
     * 2、15位身份证无最后一位校验码。18位身份证中，校验码根据根据前17位生成
     *
     * @return
     */
    private static String contertToNewCardNumber(String oldCardNumber) {
        if (oldCardNumber.length() == OLD_CARD_NUMBER_LENGTH) {
            StringBuilder buf = new StringBuilder(NEW_CARD_NUMBER_LENGTH);
            buf.append(oldCardNumber.substring(0, 6));
            buf.append("19");
            buf.append(oldCardNumber.substring(6));
            buf.append(calculateVerifyCode(buf));
            return buf.toString();
        }
        return oldCardNumber;
    }

    /**
     * 计算最后一位校验码  加权值%11
     * （1）十七位数字本体码加权求和公式 S = Sum(idCard * Wi), i = 0, ... , 16 ，先对前17位数字的权求和
     * idCard:表示第i位置上的身份证号码数字值 Wi:表示第i位置上的加权因子 Wi: 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4
     * （2）计算模 Y = mod(S, 11)
     * （3）通过模得到对应的校验码 Y: 0 1 2 3 4 5 6 7 8 9 10 校验码: 1 0 X 9 8 7 6 5 4 3 2
     *
     * @param cardNumber
     * @return
     */
    private static String calculateVerifyCode(CharSequence cardNumber) {
        int sum = 0;
        for (int i = 0; i < NEW_CARD_NUMBER_LENGTH - 1; i++) {
            char ch = cardNumber.charAt(i);
            sum += ((int) (ch - '0')) * Integer.parseInt(Wi[i]);
        }
        return ValCodeArr[sum % 11];
    }

    /**
     * 获取身份证的出生日期
     *
     * @param idCard
     * @return yyyyMMdd
     */
    private static String getBirthDayPart(String idCard) {
        return idCard.substring(6, 14);
    }

    /**
     * 获取生日
     *
     * @param idCard
     * @return
     */
    private static Date getBirthDate(String idCard) throws Exception {
        Date cacheBirthDate = null;
        try {
            cacheBirthDate = createBirthDateParser().parse(getBirthDayPart(idCard));
        } catch (Exception e) {
            throw new Exception(BIRTHDAY_ERROR);
        }
        return new Date(cacheBirthDate.getTime());
    }

    private static SimpleDateFormat createBirthDateParser() {
        return new SimpleDateFormat(BIRTH_DATE_FORMAT, Locale.getDefault());
    }

    /**
     * 隐藏身份证号码中间
     * @param idCard
     * @return
     */
    public static String  hideMiddle(String idCard){
        if(idCard==null){
            return null;
        }
        //在replace函数中，$1,$2,$3，可以分别用来表示：
        //正则表达式中，匹配出的第1、2、3个子表达式。
        //这里 $1表示匹配到的(\d{6})
        //这里 $2表示匹配到的(\w{4})
        if(idCard.length()==NEW_CARD_NUMBER_LENGTH){
           return idCard.replaceAll("(\\d{6})\\d{8}(\\w{4})","$1*****$2");

        }else if(idCard.length()==OLD_CARD_NUMBER_LENGTH){
            return idCard.replaceAll("(\\d{6})\\d{6}(\\d{3})","$1*****$2");
        }
        return idCard;
    }
}
